home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue41 / Patterns / Unit2.dfm / Unit2.txt
Encoding:
Text File  |  1998-11-19  |  1.6 KB  |  77 lines
  1. object Form2: TForm2
  2.   Left = 268
  3.   Top = 120
  4.   Width = 268
  5.   Height = 209
  6.   Caption = 'Generic Singleton'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Visible = True
  13.   OnCreate = FormCreate
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object GroupBox1: TGroupBox
  17.     Left = 8
  18.     Top = 128
  19.     Width = 241
  20.     Height = 49
  21.     Caption = 'Try to break it:'
  22.     Font.Charset = DEFAULT_CHARSET
  23.     Font.Color = clWindowText
  24.     Font.Height = -13
  25.     Font.Name = 'MS Sans Serif'
  26.     Font.Style = [fsBold]
  27.     ParentFont = False
  28.     TabOrder = 2
  29.     object Button2: TButton
  30.       Left = 120
  31.       Top = 19
  32.       Width = 97
  33.       Height = 25
  34.       Caption = 'TObject.&Free'
  35.       Font.Charset = DEFAULT_CHARSET
  36.       Font.Color = clWindowText
  37.       Font.Height = -11
  38.       Font.Name = 'MS Sans Serif'
  39.       Font.Style = []
  40.       ParentFont = False
  41.       TabOrder = 0
  42.       OnClick = Button2Click
  43.     end
  44.     object Button1: TButton
  45.       Left = 8
  46.       Top = 19
  47.       Width = 105
  48.       Height = 25
  49.       Caption = 'TObject.&Destroy'
  50.       Font.Charset = DEFAULT_CHARSET
  51.       Font.Color = clWindowText
  52.       Font.Height = -11
  53.       Font.Name = 'MS Sans Serif'
  54.       Font.Style = []
  55.       ParentFont = False
  56.       TabOrder = 1
  57.       OnClick = Button1Click
  58.     end
  59.   end
  60.   object Memo: TMemo
  61.     Left = 16
  62.     Top = 8
  63.     Width = 233
  64.     Height = 73
  65.     TabOrder = 0
  66.   end
  67.   object Button3: TButton
  68.     Left = 16
  69.     Top = 88
  70.     Width = 105
  71.     Height = 25
  72.     Caption = '&Poll Info'
  73.     TabOrder = 1
  74.     OnClick = Button3Click
  75.   end
  76. end
  77.